home *** CD-ROM | disk | FTP | other *** search
/ PC Home 109 / PC Home 109.iso / data1.cab / Program_Files / id007.dxr / 00184.ls < prev    next >
Encoding:
Text File  |  2001-03-02  |  615 b   |  20 lines
  1. on exitFrame
  2.   set LastTick to the ticks
  3.   repeat while the locH of sprite 13 < 350
  4.     set x to 2 * (the ticks - LastTick)
  5.     set LastTick to the ticks
  6.     set the locH of sprite 13 to the locH of sprite 13 + x
  7.     updateStage()
  8.   end repeat
  9.   set LastTick to the ticks
  10.   set OriginalTick to the ticks
  11.   repeat while (the ticks - OriginalTick) < 470
  12.     set x to 2 * (the ticks - LastTick)
  13.     set y to 2 * (the ticks - LastTick)
  14.     set LastTick to the ticks
  15.     set the locV of sprite 15 to the locV of sprite 15 - y
  16.     set the locH of sprite 15 to the locH of sprite 15 + x
  17.     updateStage()
  18.   end repeat
  19. end
  20.